home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Macromedia Multimedia Showcase 5.1
/
Macromedia - Multimedia Showcase 5.1 (Macromedia) (1996).ISO
/
pc
/
media
/
20000.dir
/
00213_Script_213
< prev
next >
Wrap
Text File
|
1996-03-27
|
1KB
|
40 lines
-- local scripts for 200000.dir
on checkHeadRollover
set headSpriteList = [8,9,10,11,12,18,19,20]
set headChan = 7
set gotRoll = FALSE
repeat with i in headSpriteList
if rollover(i) then
startRollover(headChan)
-- These are the names of cast numbers for the names of the MM bigwigs
set headCastList = ["BudColligan name", "JimVonEhr name", "JimFunk name", "JoeDunn name", "MilesWalsh name", "RandyUbillos name", "rickWood name", "SusanGordon name"]
set whichNum = getOne(headSpriteList, i)
set whichCast = getAt(headCastList,whichNum)
set the castNum of sprite headChan = the number of cast whichCast
set gotRoll = TRUE
exit repeat
end if
end repeat
if not gotRoll then
-- Reset to cast 201 (HARDCODED!) "Roll over to see names" cast
set defaultCast = the number of cast "03 roll"
set curCast = the castNum of sprite headChan
if curCast <> defaultCast then
set the castNum of sprite headChan = defaultCast
end if
end if
updateStage
end checkHeadRollover
on startRollover theChan
if the puppet of sprite theChan = FALSE then
puppetsprite theChan, TRUE
global gNavObj
add(the exitQue of gNavObj, ("endRoll " & theChan))
end if
end startRollover
on endRoll theChan
puppetsprite theChan, FALSE
end endRoll